﻿Public Class Evento
    Public Sub New()
        _reserva = New Collection
    End Sub


    Private _idevento As Integer
    Public Property idevento() As Integer
        Get
            Return _idevento
        End Get
        Set(ByVal value As Integer)
            _idevento = value
        End Set
    End Property



    Private _idproveedor As Integer
    Public Property idproveedor() As Integer
        Get
            Return _idproveedor
        End Get
        Set(ByVal value As Integer)
            _idproveedor = value
        End Set
    End Property


    Private _iddeporte As Integer
    Public Property iddeporte() As Integer
        Get
            Return _iddeporte
        End Get
        Set(ByVal value As Integer)
            _iddeporte = value
        End Set
    End Property


    Private _ubicacion As String
    Public Property ubicacion() As String
        Get
            Return _ubicacion
        End Get
        Set(ByVal value As String)
            _ubicacion = value
        End Set
    End Property


    Private _descripcion As String
    Public Property descripcion() As String
        Get
            Return _descripcion
        End Get
        Set(ByVal value As String)
            _descripcion = value
        End Set
    End Property


    Private _fecha_evento As String
    Public Property fecha_evento() As String
        Get
            Return _fecha_evento
        End Get
        Set(ByVal value As String)
            _fecha_evento = value
        End Set
    End Property


    Private _reserva As Collection
    Public Property reserva() As Collection
        Get
            Return _reserva
        End Get
        Set(ByVal value As Collection)
            _reserva = value
        End Set
    End Property

    Public Sub agregarReserva(ByVal p As Reserva)
        _reserva.Add(p)
    End Sub


End Class
